home *** CD-ROM | disk | FTP | other *** search
/ Internet.Works 39 / Issue 39.iso / pc / Disclaimer / 00010_Decline RollOver.ls < prev    next >
Encoding:
Text File  |  2000-09-25  |  377 b   |  16 lines

  1. on mouseWithin me
  2.   sprite(the currentSpriteNum).foreColor = 70
  3.   cursor(280)
  4.   put "I disagree with the above statement, outlining terms and conditions for the use of this CD-Rom. The interface will quit." into member "Infofield"
  5. end
  6.  
  7. on mouseLeave me
  8.   sprite(the currentSpriteNum).foreColor = 255
  9.   cursor(0)
  10.   put EMPTY into member "Infofield"
  11. end
  12.  
  13. on mouseUp
  14.   quit()
  15. end
  16.